home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-13 / tsqed16.zip / TOIBM.QMA < prev    next >
Text File  |  1991-12-26  |  849b  |  19 lines

  1. *                                                All rights reserved
  2. * Convert ascii to Scandinavian characters
  3. * By Timo Salmi, Thu 26-Dec-91
  4. *
  5. * To compile this macro apply QMAC TOIBM.MAC TOIBM.QMA /A- /B
  6. * The QMAC.EXE macro translator is from
  7. * garbo.uwasa.fi:/pc/editor/qmac215.zip
  8. * (Also the earlier version 2.1 will do).
  9. *
  10.  
  11. @5 MacroBegin
  12.    BegFile FindReplace "{" Return "ä" Return Return JFalse next01: "r" next01:
  13.    BegFile FindReplace "}" Return "å" Return Return JFalse next02: "r" next02:
  14.    BegFile FindReplace "|" Return "ö" Return Return JFalse next03: "r" next03:
  15.    BegFile FindReplace "[" Return "Ä" Return Return JFalse next04: "r" next04:
  16.    BegFile FindReplace "]" Return "Å" Return Return JFalse next05: "r" next05:
  17.    BegFile FindReplace "\" Return "Ö" Return Return JFalse next06: "r" next06:
  18.    BegFile
  19.